clear;
T = readmatrix('Input Data\Connect_byInd_Data_NAICS.xlsx','NumHeaderLines',0);
order = [3,14,1,8,12,15,18,10,9,17,13,5,7,6,4,2,11,16];
for j = 1:18
    i = order(j);
    y(1:19,j) = T(19*(i-1)+1:19*(i-1)+1+18,3);
end
x = 2000:1:2018;
lwid = 2;

titles = {{'Graph A: Utilities',''}
            {'Graph B: Educational Services',''}
            {'Graph C: Agriculture, Forestry,','Fishing & Hunting'}
            {'','Graph D: Transportation','& Warehousing'}
            {'','Graph E: Professional, Scientific,','& Technical Services'}
            {'','Graph F: Health Care','& Social Assistance'}
            {'','Graph G: Other Services','(except Public Administration)'}
            {'','Graph H: Finance & Insurance',''}
            {'','Graph I: Information',''}
            {'','Graph J: Accommodation','& Food Services'}
            {'','Graph K: Admin, Support, Waste','Mgmt, & Remediation Services'}
            {'','Graph L: Manufacturing',''}
            {'','Graph M: Retail Trade',''}
            {'','Graph N: Wholesale Trade',''}
            {'','Graph O: Construction',''}
            {'','Graph P: Mining',''}
            {'','Graph Q: Real Estate Rental','& Leasing'}
            {'','Graph R: Arts, Entertainment,','& Recreation'}};
      
yt = [{0.2:0.1:0.5}
    {0.28:0.04:0.4}
    {0.2:0.1:0.4}
    {0.18:0.05:0.28}
    {0.18:0.04:0.3}
    {0:0.1:0.3}
    {0.14:0.04:0.22}
    {0.14:0.04:0.22}
    {0.14:0.04:0.22}
    {0.14:0.03:0.2}
    {0.12:0.04:0.2}
    {0.08:0.05:0.18}
    {0.1:0.05:0.2}
    {0.08:0.04:0.2}
    {0.08:0.04:0.2}
    {0.08:0.04:0.2}
    {0.08:0.04:0.16}
    {0.04:0.05:0.14}];

hold on
figure(1)
clf(1,'reset');
for i = 1:18
    subplot(6,3,i)
    h = plot(x,y(:,i),'k','LineWidth',lwid);
    ymax = 0.6;
    ymin = 0;
    axis([2000 2018 ymin ymax])
    xticks(2000:3:2018)
    xtickangle(45)
    yticks(0:0.2:0.6)
    set(gca,'FontSize',7)
    title(titles{i},'FontSize',7)
end
set(gcf,'position',[469,42,771,954])
print(gcf,'Figure1.tiff','-dtiff','-r300'); 